(flyspell-mode-on): fix kill-buffer-hook

to make killing of ispell process work even if
kill-all-local-variables has been run.

diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el
index 43ddf8bea739b23b8ef00d3766a51acfcdf2ebbd..cae3fb76c985468aca802e9ee73e4f289a9ff1fb 100644 (file)
--- a/lisp/textmodes/flyspell.el
+++ b/lisp/textmodes/flyspell.el
@@ -344,8 +344,8 @@ flyspell-buffer checks the whole buffer."
   ;; improvement).
   (add-hook 'kill-buffer-hook
            '(lambda ()
-              (if flyspell-mode
-                  (flyspell-mode-off))))
+              (if (and flyspell-multi-language-p ispell-process)
+                  (ispell-kill-ispell t))))
   ;; we end with the flyspell hooks
   (run-hooks 'flyspell-mode-hook))